创建多行文字

您所在的位置:网站首页 VBA 多行文字 转单行文字 创建多行文字

创建多行文字

2024-07-03 17:19| 来源: 网络整理| 查看: 265

previous page next page 使用多行文字 使用多行文字 格式化多行文字   ActiveX/VBA 开发人员手册 > 创建和编辑 AutoCAD 图元 > 将文字添加到图形 > 使用多行文字 >  创建多行文字      

可以使用 AddMText 方法来创建多行文字对象(MText 对象)。此方法需要输入三个值:文字字符串、图形中用于放置文字的插入点和文字边框的宽度。

字符串是要显示的实际文字,可以是 Unicode、控制代码和特殊字符。插入点是包含三个双精度数的变量数组,这三个数代表图形中放置文字处的三维 WCS 坐标。文字宽度是代表文字边框宽度的正数,宽度是以当前单位测量的。

创建 MText 对象之后,用户可以将文字高度、对正、旋转角度和样式应用到 MText 对象,或将字符格式应用到选定字符。

有关应用于 MText 对象的方法和特性的列表,请参见《ActiveX and VBA Reference》中 MText 的相关条目。

创建多行文字的步骤

以下代码在模型空间中的 (2,2,0) 坐标处创建 MText 对象。

Sub Ch4_CreateMText() Dim mtextObj As AcadMText Dim insertPoint(0 To 2) As Double Dim width As Double Dim textString As String insertPoint(0) = 2 insertPoint(1) = 2 insertPoint(2) = 0 width = 4 textString = "This is a text string for the mtext object." ' 在模型空间中创建文字对象 Set mtextObj = ThisDrawing.ModelSpace. _ AddMText(insertPoint, width, textString) ZoomAll End Sub 请将关于此页的评论发送给我们


【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3